home *** CD-ROM | disk | FTP | other *** search
/ NetNews Offline 2 / NetNews Offline Volume 2.iso / news / comp / lang / rexx / 332 < prev    next >
Encoding:
Internet Message Format  |  1996-08-06  |  2.1 KB
  1. Path: news.cac.psu.edu!usenet
  2. From: jwk117@email.psu.edu
  3. Newsgroups: comp.lang.rexx,comp.os.os2.programmer.misc
  4. Subject: Re: Rexx Access to OS/2 EA's
  5. Date: 17 Jan 1996 15:07:59 GMT
  6. Organization: Penn State University, Center for Academic Computing
  7. Distribution: inet
  8. Message-ID: <4dj3cf$22ju@hearst.cac.psu.edu>
  9. References: <4dh78e$lgq@homer.alpha.net>
  10. Reply-To: jwk117@email.psu.edu
  11. NNTP-Posting-Host: nbslip108.cac.psu.edu
  12. X-Newsreader: IBM NewsReader/2 v1.9d - NLS
  13.  
  14. In <4dh78e$lgq@homer.alpha.net>, ldreher@execpc.com (Larry Dreher) writes:
  15. >I'm trying to write a simple rexx program that will display a list of files 
  16. >along with assorted OS/2 EA's.  The SysGetEA 
  17. >function seems to be what I need more doc to get it to work. 
  18. >
  19. From what I've been able to figure out the format for EA's is:
  20. 'DFFFnnnnnn00FDFF'x || d2c(length(first ea)) || '00'x || first ea || 'FDFF'x || 
  21. repeat from this point ->                                                   -->this part is only 
  22. if more eas                                                                           for adding more 
  23.                                                                                           eas
  24. where nnnnnn is the number of eas for that EA type.
  25.  
  26. For instance,
  27. if a file has a .TYPE EA that contains 'Plain Text' and 'OS/2 Command File' the
  28. EA would be
  29. 'DFFF00000200FDFF'x||d2c(length('Plain Text')||'00'x||'Plain Text'||'FDFF'x||
  30.                                d2c(length('OS/2 Command File')||'00'x||'Plain Text'
  31.  
  32. if the file has only the 'Plain Text' it would be:
  33. 'DFFF00000100FDFF'x||d2c(length('Plain Text')||'00'x||'Plain Text'
  34. or if there is only one ea for a specific Type the following seems acceptable:
  35. 'FDFF'x||d2c(length('Plain Text')||'00'x||'Plain Text'
  36. which is why the .comment ea needed only the first 5 characters removed, there
  37. is only a need for 1 ea of the type.
  38.  
  39. This format seems valid for any ea type (.type, .comment, .subject, etc)
  40.  
  41. I have several rexx program written that find, change, add, delete, ea from a list
  42. of files, translate the ea to hex form, etc.  I can email them if you like.
  43. Approx. 18k total file size.  They seem to work fine, and I think I got most bugs
  44. worked out.    
  45.  
  46.  
  47.